package com.recharge.service.httpInterFace;

import com.alibaba.fastjson.JSONObject;
import com.recharge.common.result.ResultDO;
import com.recharge.common.result.ResultSupport;
import com.recharge.common.util.Constant;
import com.recharge.common.util.MD5Util;
import com.recharge.common.util.TemplateUtils;
import com.recharge.common.util.http.HttpClientUtil;
import com.recharge.domain.query.OrderStatusQueryDO;
import com.recharge.domain.vo.GoodsChannelDO;
import com.recharge.domain.vo.ProviderApiDO;
import com.recharge.domain.vo.ProviderCallbackDO;
import com.recharge.service.ProviderApiService;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;

import java.text.DateFormat;
import java.text.SimpleDateFormat;
import java.util.Arrays;
import java.util.Date;
import java.util.HashMap;
import java.util.Map;

/**
 * <h1>上游请求(敬恒)</h1>
 *
 * @author kui
 * @date 2020.10.24
 */
@Service
public class JingHengHTTPImpl implements ProviderHTTPService {

    private Logger logger = LoggerFactory.getLogger(this.getClass().getName());

    @Autowired
    ProviderApiService providerApiService;

    @Override
    public ResultDO commitOrder(GoodsChannelDO domain) {
        if (!verifyCommitParam(domain)) {
            return returnFail(false
                    , Constant.BUSINESS_RECHARGE_RETURN_STATUS_FAIL
                    , String.format("订单提交 >> 参数缺失 %s", domain.toString())
                    , "请求参数缺失"
                    , null);
        }

        ProviderCallbackDO callbackDO = new ProviderCallbackDO();
        callbackDO.setSerialNumber(domain.getProviderSerialNumber());
        callbackDO.setProviderId(domain.getProviderId());
        callbackDO.setOrderNo(domain.getOrderNo());
        callbackDO.setStatus(Constant.CALL_BACK_PROCESS);
        ResultDO result = providerApiService.addCallback(callbackDO);
        if (!result.isSuccess()) {
            return returnFail(false
                    , Constant.BUSINESS_RECHARGE_RETURN_STATUS_FAIL
                    , String.format("订单提交 >> 订单%s添加存根信息失败", domain.getProviderSerialNumber())
                    , "添加回调存根信息失败"
                    , null);
        }

        //请求金额
        Long amount = domain.getAmount();
        //商品编号
        String goodsNo = domain.getProviderGoodsNo();
        //平台流水号
        String serialNumber = domain.getProviderSerialNumber();
        //充值号码
        String rechargeNumber = domain.getRechargeNumber();
        //供应商ID
        String userId = domain.getUserId();
        //供应商密钥
        String privateKey = domain.getPrivateKey();

        // 设置日期格式  加密签名
        String formatTime = "";
        String afterSign = "";
        try {
            DateFormat format = new SimpleDateFormat("yyyyMMddHHmmss");
            formatTime = format.format(new Date());
            //  {amount}{nowDate}{providerGoodsNo}{providerSerialNumber}{rechargeNumber}{userId}{privateKey}
            String beforeSign = amount + formatTime + goodsNo + serialNumber + rechargeNumber + userId + privateKey;
            logger.debug("before_sign: " + beforeSign);
            afterSign = MD5Util.md5(beforeSign);
        } catch (Exception e) {
            return returnFail(false
                    , Constant.BUSINESS_RECHARGE_RETURN_STATUS_FAIL
                    , String.format("渠道商ID: %s HTTP请求参数构建失败", domain.getProviderId())
                    , "HTTP请求参数构建失败"
                    , null);
        }
        //  checkItemFacePrice={amount}&dtCreate={nowDate}&itemId={providerGoodsNo}&serialno={providerSerialNumber}&uid={rechargeNumber}&userId={userId}&sign={sign}
        String requestParam = String.format("checkItemFacePrice=%s&dtCreate=%s&itemId=%s&serialno=%s&uid=%s&userId=%s&sign=%s",
                amount, formatTime, goodsNo, serialNumber, rechargeNumber, userId, afterSign);

        Map<String, String> requestParamMap = new HashMap<>();
        requestParamMap.put("checkItemFacePrice", amount.toString());
        requestParamMap.put("dtCreate", formatTime);
        requestParamMap.put("itemId", goodsNo);
        requestParamMap.put("serialno", serialNumber);
        requestParamMap.put("uid", rechargeNumber);
        requestParamMap.put("userId", userId);
        requestParamMap.put("sign", afterSign);

        // 发送请求
        logger.warn(String.format("订单提交 >> 发送GET请求(订单号%s): %s?%s", domain.getProviderSerialNumber(), domain.getRequestUrl(), requestParam));
        String sendResult = HttpClientUtil.doGet(domain.getRequestUrl(), requestParamMap);
        switch (sendResult) {
            case "500":
                return returnFail(false
                        , Constant.BUSINESS_RECHARGE_RETURN_STATUS_FAIL
                        , String.format("订单提交 >> 订单 %s -> 订单提交供货商HTTP请求失败", domain.getProviderSerialNumber())
                        , "HTTP请求失败"
                        , sendResult);
            case "504":
                return returnFail(false
                        , Constant.BUSINESS_RECHARGE_RETURN_STATUS_OUT_TIME
                        , String.format("订单提交 >> 订单 %s -> 订单提交供货商HTTP请求超时", domain.getProviderSerialNumber())
                        , "HTTP请求超时"
                        , sendResult);
            case "":
                return returnFail(false
                        , Constant.BUSINESS_RECHARGE_RETURN_STATUS_OUT_TIME
                        , String.format("订单提交 >> 订单 %s -> 订单提交供货商HTTP请求没有返回信息", domain.getProviderSerialNumber())
                        , "订单提交没有返回信息"
                        , sendResult);
        }
        logger.warn(String.format("订单提交 >> 请求返回信息: 订单 %s -> %s", domain.getProviderSerialNumber(), sendResult));

        // 解析请求返回结果转换为json对象
        JSONObject resultJson = new JSONObject();
        try {
            resultJson = TemplateUtils.xml2Json(sendResult);
        } catch (Exception e) {
            logger.debug(String.format("订单提交 >> 请求返回结果解析XML失败: %s", sendResult));
        }
        if (resultJson.size() == 0) {
            return returnFail(false
                    , Constant.BUSINESS_RECHARGE_RETURN_STATUS_OUT_TIME
                    , String.format("订单提交 >> 订单 %s -> 订单提交没有返回信息", domain.getProviderSerialNumber())
                    , "没有返回信息"
                    , sendResult);
        }

        String code = null;
        String desc = "";
        try {
            code = resultJson.get("code").toString();
            desc = resultJson.get("desc").toString();
        } catch (Exception e) {
            logger.debug(String.format("获取返回信息失败: 订单 %s -> %s", domain.getProviderSerialNumber(), sendResult));
        }
        if (code == null) {
            return returnFail(false
                    , Constant.BUSINESS_RECHARGE_RETURN_STATUS_OUT_TIME
                    , String.format("订单提交 >> 订单 %s -> 没有获取到返回状态码", domain.getProviderSerialNumber())
                    , "订单提交没有返回状态码"
                    , sendResult);
        }

        // 状态码: 下单失败
        String[] array = {"10", "11", "12", "20", "21", "22", "24", "25", "28", "30", "41", "42", "43", "44", "51", "54"};

        // 状态码: 未确认
        String[] array2 = {"23", "31", "50"};

        if ("00".equals(code)) { //成功
            logger.debug(String.format("订单提交 >> 订单 %s -> 订单提交成功|%s %s", domain.getProviderSerialNumber(), code, desc));
            result.setModel(ResultDO.FIRST_MODEL_KEY, Constant.BUSINESS_RECHARGE_RETURN_STATUS_SUCCESS);
            result.setModel(ResultDO.SECOND_MODEL_KEY, "");
            return result;
        } else if (Arrays.asList(array).contains(code)) {//失败
            return returnFail(true
                    , Constant.BUSINESS_RECHARGE_RETURN_STATUS_FAIL
                    , String.format("订单提交 >> 订单 %s -> 订单提交失败|%s %s", domain.getProviderSerialNumber(), code, desc)
                    , String.format("%s %s", desc, code)
                    , sendResult);
        } else if (Arrays.asList(array2).contains(code)) {//未确认
            return returnFail(true
                    , Constant.BUSINESS_RECHARGE_RETURN_STATUS_OUT_TIME
                    , String.format("订单提交 >> 订单 %s -> 订单未确认|%s %s", domain.getProviderSerialNumber(), code, desc)
                    , String.format("%s %s", desc, code)
                    , sendResult);
        } else {//未知
            return returnFail(true
                    , Constant.BUSINESS_RECHARGE_RETURN_STATUS_OUT_TIME
                    , String.format("订单提交 >> 订单 %s -> 订单未知|%s %s", domain.getProviderSerialNumber(), code, desc)
                    , String.format("%s %s", desc, code)
                    , sendResult);
        }
    }

    @Override
    public ResultDO backOrder(ProviderApiDO domain, String paramStr, String bodyStr) {
        ResultDO result = new ResultSupport();
        JSONObject jsonObject = null;
        try {
            jsonObject = JSONObject.parseObject(paramStr);
            logger.debug("订单异步回调 >> " + domain.getProviderNo() + "解析后数据: " + jsonObject.toJSONString());
        } catch (Exception e) {
            logger.debug("订单异步回调 >> " + domain.getProviderNo() + "解析json失败:" + paramStr);
        }
        if (jsonObject == null) {
            logger.debug("订单异步回调 >> 收到异步回调,但是没有回调信息");
            result.setSuccess(false);
            result.setModel(ResultDO.FIRST_MODEL_KEY, "fail");
            return result;
        }

        String orderNo, serialNum, bizId, status, returnSign, userId, voutcher = "";
        try {
            //上游流水号
            orderNo = jsonObject.getString("ejId");
            //平台流水号
            serialNum = jsonObject.getString("downstreamSerialno");
            //业务类型
            bizId = jsonObject.getString("bizId");
            //状态
            status = jsonObject.getString("status");
            // 回调签名
            returnSign = jsonObject.getString("sign");
            //充值编号
            userId = jsonObject.getString("userId");
            //充值凭证
            if (!TemplateUtils.isEmpty(jsonObject.get("voucher"))) {
                voutcher = jsonObject.getString("voucher");
            }
        } catch (Exception e) {
            logger.debug("订单异步回调 >> 获取返回结果异常" + e.getMessage());
            result.setSuccess(false);
            result.setModel(ResultDO.FIRST_MODEL_KEY, "fail");
            return result;
        }
        //加密前签名
        String beforeVerifySign = bizId + serialNum + orderNo + status + userId + domain.getPrivateKey();

        String afterVerifySign = "";
        try {
            afterVerifySign = MD5Util.md5(beforeVerifySign, 32);
        } catch (Exception e) {
            logger.debug("订单异步回调 >> 订单(" + serialNum + ")验签加密失败" + e.getMessage());
        }
//        logger.debug("签名验证: after >>"+afterVerifySign);
        if (!afterVerifySign.equals(returnSign)) {
            logger.debug("订单异步回调 >> 签名校验: 加密前 >>" + beforeVerifySign);
            logger.debug(String.format("订单异步回调 >> 订单:%s 签名校验不一致 {本地签名:%s 返回签名:%s }", serialNum, afterVerifySign, returnSign));
            result.setModel(ResultDO.FIRST_MODEL_KEY, "fail");
            return result;
        }

        //判断订单状态
        if (status.equals("2")) {
            logger.debug(String.format("订单异步回调 >> 订单异步返回:%s 成功 status: %s", serialNum, status));
            result = providerApiService.updateCallback(serialNum, voutcher, orderNo, Constant.CALL_BACK_SUCCESS);
        } else if (status.equals("3")) {
            logger.debug(String.format("订单异步回调 >> 订单异步返回:%s 失败 status: %s", serialNum, status));
            result = providerApiService.updateCallback(serialNum, "", orderNo, Constant.CALL_BACK_FAIL);
        } else {
            logger.debug(String.format("订单异步回调 >> 订单异步返回:%s 未确认 status: %s", serialNum, status));
            result = providerApiService.updateCallback(serialNum, "", orderNo, Constant.CALL_BACK_NUKNOW);
        }
        if (!result.isSuccess()) {
            logger.debug("订单异步回调 >> 更新订单(" + serialNum + ")状态失败");
            result.setModel(ResultDO.FIRST_MODEL_KEY, "fail");
            return result;
        }

        result.setModel(ResultDO.FIRST_MODEL_KEY, "success");
        return result;

    }

    @Override
    public ResultDO queryOrder(OrderStatusQueryDO domain) {
        ResultDO result = new ResultSupport();

        Map<String, String> requestParamMap = new HashMap<>();
        requestParamMap.put("serialno", domain.getSerialNo());
        requestParamMap.put("userId", domain.getUserId());
        String sign = "";
        try {
            sign = MD5Util.md5(domain.getSerialNo() + domain.getUserId() + domain.getPrivateKey());
        } catch (Exception e) {
            logger.debug("查询订单 >> 签名加密失败" + e.getMessage());
            result.setSuccess(false);
            result.setModel(ResultDO.THIRD_MODEL_KEY, "签名加密失败");
            return result;
        }
        requestParamMap.put("sign", sign);

        // 发送请求
        logger.debug(String.format("查询订单 >> 发送GET请求(订单号%s): url %s , param %s", domain.getSerialNo(), domain.getOrderFindUrl(), requestParamMap));
        String sendResult = HttpClientUtil.doGet(domain.getOrderFindUrl(), requestParamMap);
        switch (sendResult) {
            case "500":
                logger.debug(String.format("查询订单 >> 订单 %s -> HTTP请求失败|500", domain.getSerialNo()));
                result.setSuccess(false);
                result.setModel(ResultDO.THIRD_MODEL_KEY, "HTTP请求失败");
                return result;
            case "504":
                logger.debug(String.format("查询订单 >> 订单 %s -> HTTP请求超时|504", domain.getSerialNo()));
                result.setSuccess(false);
                result.setModel(ResultDO.THIRD_MODEL_KEY, "HTTP请求超时");
                return result;
            case "":
                logger.debug(String.format("查询订单 >> 订单 %s -> 请求没有返回信息", domain.getSerialNo()));
                result.setSuccess(false);
                result.setModel(ResultDO.THIRD_MODEL_KEY, "请求没有返回信息");
                return result;
        }
        logger.debug(String.format("查询订单 >> 请求返回信息: 订单 %s -> %s", domain.getSerialNo(), sendResult));

        // 解析请求返回结果转换为json对象
        JSONObject resultJson = new JSONObject();
        try {
            resultJson = TemplateUtils.xml2Json(sendResult);
        } catch (Exception e) {
            logger.debug(String.format("查询订单 >> 请求返回结果解析XML失败: %s", sendResult));
        }
        if (resultJson.size() == 0) {
            logger.debug("查询订单 >> 未找到请求返回结果");
            result.setSuccess(false);
            result.setModel(ResultDO.THIRD_MODEL_KEY, "未找到请求返回结果");
            return result;
        }

        String code = null;
        String desc = "";
        try {
            code = resultJson.get("code").toString();
            desc = resultJson.get("desc").toString();
        } catch (Exception e) {
            logger.debug(String.format("查询订单 >> 获取返回信息失败: 订单 %s -> %s", domain.getSerialNo(), sendResult));
        }
        if (code == null) {
            logger.debug("查询订单 >> 未获取到返回状态码");
            result.setSuccess(false);
            result.setModel(ResultDO.THIRD_MODEL_KEY, "未获取到返回状态码");
            return result;
        }

        // 查询状态码: 查询失败
        String[] array = {"10", "11", "12", "50", "51"};

        // 订单状态码: 未确认
        String[] array2 = {"0", "1", "4"};

        if ("00".equals(code)) { //请求成功
            String status = "";
            String voucher = "";
            try {
                JSONObject data = resultJson.getJSONObject("data");
                if (data == null || data.size() == 0) {
                    logger.debug("查询订单 >> 未获取到返回信息结果集");
                    result.setSuccess(false);
                    result.setModel(ResultDO.THIRD_MODEL_KEY, "未获取到返回信息结果集");
                    return result;
                }
                status = data.getString("status");
                desc = data.getString("statusDesc");
                if (data.get("outOrderNo") != null) {
                    voucher = data.getString("outOrderNo");
                }
            } catch (Exception e) {
                logger.debug("查询订单 >> 未获取到返回结果集信息");
                result.setSuccess(false);
                result.setModel(ResultDO.THIRD_MODEL_KEY, "未获取到返回信息结果集");
                return result;
            }

            if (status.equals("2")) { //成功
                logger.debug(String.format("查询订单 >> 订单 %s -> 订单成功|%s", domain.getSerialNo(), desc));
                result.setModel(ResultDO.FIRST_MODEL_KEY, Constant.CALL_BACK_SUCCESS);
                result.setModel(ResultDO.SECOND_MODEL_KEY, voucher);
            } else if (status.equals("3")) {//失败
                logger.debug(String.format("查询订单 >> 订单 %s -> 订单失败|%s", domain.getSerialNo(), desc));
                result.setModel(ResultDO.FIRST_MODEL_KEY, Constant.CALL_BACK_FAIL);
            } else if (Arrays.asList(array2).contains(status)) {//充值中
                logger.debug(String.format("查询订单 >> 订单 %s -> 订单充值中|%s", domain.getSerialNo(), desc));
                result.setModel(ResultDO.FIRST_MODEL_KEY, Constant.CALL_BACK_PROCESS);
            } else if (status.equals("9")) { //待确认
                logger.debug(String.format("查询订单 >> 订单 %s -> 订单未确认|%s", domain.getSerialNo(), desc));
                result.setModel(ResultDO.FIRST_MODEL_KEY, Constant.CALL_BACK_NUKNOW);
            } else {//未知
                logger.debug(String.format("查询订单 >> 订单 %s -> 订单未知|%s %s", domain.getSerialNo(), desc, status));
                result.setModel(ResultDO.FIRST_MODEL_KEY, Constant.CALL_BACK_NUKNOW);
            }
        } else if (code.equals("22")) {//订单不存在
            logger.debug(String.format("查询订单 >> 订单 %s -> 订单查询订单不存在|%s", domain.getSerialNo(), desc));
            result.setModel(ResultDO.FIRST_MODEL_KEY, Constant.CALL_BACK_NOT_EXIST);
            result.setModel(ResultDO.FOURTH_MODEL_KEY, 10);
        } else if (Arrays.asList(array).contains(code)) {//请求失败
            logger.debug(String.format("查询订单 >> 订单 %s -> 订单查询请求失败|%s", domain.getSerialNo(), desc));
            result.setModel(ResultDO.FIRST_MODEL_KEY, Constant.CALL_BACK_NUKNOW);
        } else {//未知
            logger.debug(String.format("查询订单 >> 订单 %s -> 订单查询请求失败|%s", domain.getSerialNo(), desc));
            result.setModel(ResultDO.FIRST_MODEL_KEY, Constant.CALL_BACK_NUKNOW);
        }
        result.setModel(ResultDO.THIRD_MODEL_KEY, desc);
        return result;
    }

    @Override
    public ResultDO queryBalance(ProviderApiDO domain) {
        ResultDO result = new ResultSupport();
        if (domain.getPrivateKey() == null || domain.getUserId() == null) {
            result.setSuccess(false);
            result.setModel(ResultDO.FIRST_MODEL_KEY, "查询失败");
            return result;
        }
        Map<String, String> requestParamMap = new HashMap<>();
        requestParamMap.put("userId", domain.getUserId());
        String sign = "";
        try {
            sign = MD5Util.md5(domain.getUserId() + domain.getPrivateKey());
        } catch (Exception e) {
            logger.debug("余额查询 >> 签名加密失败" + e.getMessage());
            result.setSuccess(false);
            result.setModel(ResultDO.FIRST_MODEL_KEY, "签名加密失败");
            return result;
        }
        requestParamMap.put("sign", sign);

        // 发送请求
        String sendResult = HttpClientUtil.doGet(domain.getBalanceFindUrl(), requestParamMap);
        logger.debug(String.format("余额查询 >> 余额查询返回信息: 供应商账号 %s -> %s", domain.getUserId(), sendResult));

        // 解析请求返回结果转换为json对象
        JSONObject resultJson = new JSONObject();
        try {
            resultJson = TemplateUtils.xml2Json(sendResult);
        } catch (Exception e) {
            logger.debug(String.format("余额查询 >> 请求返回结果解析XML失败: %s", sendResult));
        }
        if (resultJson.size() == 0) {
            result.setSuccess(false);
            logger.debug(String.format("余额查询 >> 供应商账号: %s -> 余额查询没有返回信息", domain.getUserId()));
            result.setModel(ResultDO.FIRST_MODEL_KEY, "查询失败");
            return result;
        }
        String code = null;
        String balance = null;
        String desc = "";
        try {
            if (resultJson.get("desc") != null) {
                desc = resultJson.get("desc").toString();
            }
            code = resultJson.get("code").toString();
            if (resultJson.get("balance") != null) {
                StringBuilder buffer = new StringBuilder(resultJson.getString("balance"));
                buffer.insert(buffer.length() - 3, '.');
                balance = buffer.toString();
            }
        } catch (Exception e) {
            logger.debug(String.format("余额查询 >> 获取返回信息失败: 供应商账号%s -> %s", domain.getUserId(), sendResult));
        }
        if (code == null || !code.equals("00")) {
            logger.debug(String.format("余额查询 >> 供应商账号 %s -> 余额查询失败 | %s", domain.getUserId(), desc));
            result.setModel(ResultDO.FIRST_MODEL_KEY, desc);
            return result;
        }
        result.setModel(ResultDO.FIRST_MODEL_KEY, balance);
        return result;
    }

    /**
     * 验证提交参数
     *
     * @param domain
     * @return boolean
     */
    private boolean verifyCommitParam(GoodsChannelDO domain) {
        // 密钥
        if (TemplateUtils.isEmpty(domain.getPrivateKey())) {
            return false;
        }
        // 流水号
        if (TemplateUtils.isEmpty(domain.getProviderSerialNumber())) {
            return false;
        }
        // 商户ID
        if (TemplateUtils.isEmpty(domain.getProviderId())) {
            return false;
        }
        // 上游账号
        if (TemplateUtils.isEmpty(domain.getUserId())) {
            return false;
        }
        // 商品编号
        if (TemplateUtils.isEmpty(domain.getProviderGoodsNo())) {
            return false;
        }
        // 面值
        if (TemplateUtils.isEmpty(domain.getAmount())) {
            return false;
        }
        // 充值号码
        if (TemplateUtils.isEmpty(domain.getRechargeNumber())) {
            return false;
        }
        // 回调地址
//        if (TemplateUtils.isEmpty(domain.getCallback())) {
//            return false;
//        }
        return true;
    }

    /**
     * <h2>提交订单返回失败</h2>
     *
     * @param success    是否处理成功
     * @param code       订单状态
     * @param logMessage 失败信息
     * @param message    供货摘要
     * @param entity     返回信息字符串
     * @return FIRST_MODEL_KEY: 订单状态
     * SECOND_MODEL_KEY: 供货摘要
     * THIRD_MODEL_KEY: 上游返回信息字符串
     */
    private ResultDO returnFail(boolean success, int code, String logMessage, String message, String entity) {
        ResultDO result = new ResultSupport();
        result.setSuccess(success);
        result.setModel(ResultDO.FIRST_MODEL_KEY, code);
        result.setModel(ResultDO.SECOND_MODEL_KEY, message);
        result.setModel(ResultDO.THIRD_MODEL_KEY, entity);
        logger.debug(logMessage);
        return result;
    }

}
